home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Math Factory™ Demo ••••• / Math Factory™ Demo •••••.rsrc / CODE_30.txt < prev    next >
Text File  |  1988-01-30  |  12KB  |  204 lines
  1. # near model CODE resource
  2. # jump table entries: 784-785 (2 of them)
  3. 00000000  0000 0000                ori.b      D0, 0x0
  4. export_98:
  5. 00000004  4E56 FEFA                link       A6, -0x0106
  6. 00000008  302D E9C6                move.w     D0, [A5 - 0x163A]
  7. 0000000C  C1FC 0016                muls.w     D0, 0x16
  8. 00000010  7200                     moveq.l    D1, 0x00
  9. 00000012  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  10. 00000016  1230 0000                move.b     D1, [A0 + D0.w]
  11. 0000001A  0241 00FF                andi.w     D1, 0xFF
  12. 0000001E  0041 0100                ori.w      D1, 0x100
  13. 00000022  3D41 FEFA                move.w     [A6 - 0x106], D1
  14. 00000026  486E FEFA                pea.l      [A6 - 0x106]
  15. 0000002A  486E FFFC                pea.l      [A6 - 0x4]
  16. 0000002E  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  17. 00000032  302D E852                move.w     D0, [A5 - 0x17AE]
  18. 00000036  5240                     addq.w     D0, 1
  19. 00000038  E748                     lsl        D0.w, 3
  20. 0000003A  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  21. 0000003E  3F30 0000                move.w     -[A7], [A0 + D0.w]
  22. 00000042  302D E852                move.w     D0, [A5 - 0x17AE]
  23. 00000046  5240                     addq.w     D0, 1
  24. 00000048  E748                     lsl        D0.w, 3
  25. 0000004A  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  26. 0000004E  3230 0000                move.w     D1, [A0 + D0.w]
  27. 00000052  0441 0045                subi.w     D1, 0x45 /* 'E' */
  28. 00000056  3F01                     move.w     -[A7], D1
  29. 00000058  A893                     syscall    MoveTo
  30. 0000005A  3F3C 0014                move.w     -[A7], 0x14
  31. 0000005E  A887                     syscall    TextFont
  32. 00000060  3F3C 000C                move.w     -[A7], 0xC
  33. 00000064  A88A                     syscall    TextSize
  34. 00000066  3F2D FE3E                move.w     -[A7], [A5 - 0x1C2]
  35. 0000006A  A883                     syscall    DrawChar
  36. 0000006C  3F3C 000E                move.w     -[A7], 0xE
  37. 00000070  A887                     syscall    TextFont
  38. 00000072  3F3C 0018                move.w     -[A7], 0x18
  39. 00000076  A88A                     syscall    TextSize
  40. 00000078  4E5E                     unlink     A6
  41. 0000007A  4E75                     rts
  42. 0000007C  0000 0000                ori.b      D0, 0x0
  43. export_99:
  44. 00000080  4E56 FEEE                link       A6, -0x0112
  45. 00000084  422E FFFF                clr.b      [A6 - 0x1]
  46. 00000088  302D E9C6                move.w     D0, [A5 - 0x163A]
  47. 0000008C  C1FC 0016                muls.w     D0, 0x16
  48. 00000090  7200                     moveq.l    D1, 0x00
  49. 00000092  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  50. 00000096  1230 0000                move.b     D1, [A0 + D0.w]
  51. 0000009A  0241 00FF                andi.w     D1, 0xFF
  52. 0000009E  0041 0100                ori.w      D1, 0x100
  53. 000000A2  3D41 FEEE                move.w     [A6 - 0x112], D1
  54. 000000A6  486E FEEE                pea.l      [A6 - 0x112]
  55. 000000AA  486E FFFA                pea.l      [A6 - 0x6]
  56. 000000AE  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  57. 000000B2  0C6D 002D FA34           cmpi.w     [A5 - 0x5CC], 0x2D /* '-' */
  58. 000000B8  57C0                     seq        D0
  59. 000000BA  4400                     neg.b      D0
  60. 000000BC  222E FFFA                move.l     D1, [A6 - 0x6]
  61. 000000C0  5381                     subq.l     D1, 1
  62. 000000C2  342D E852                move.w     D2, [A5 - 0x17AE]
  63. 000000C6  48C2                     ext.l      D2
  64. 000000C8  B481                     cmp.l      D2, D1
  65. 000000CA  5DC1                     slt        D1
  66. 000000CC  4401                     neg.b      D1
  67. 000000CE  C001                     and.b      D0, D1
  68. 000000D0  6700 0008                beq        +0xA /* 000000DA */
  69. 000000D4  1D7C 0001 FFFF           move.b     [A6 - 0x1], 0x1
  70. label000000DA:
  71. 000000DA  0C6D 002B FA34           cmpi.w     [A5 - 0x5CC], 0x2B /* '+' */
  72. 000000E0  57C0                     seq        D0
  73. 000000E2  4400                     neg.b      D0
  74. 000000E4  4A6D E852                tst.w      [A5 - 0x17AE]
  75. 000000E8  5EC1                     sgt        D1
  76. 000000EA  4401                     neg.b      D1
  77. 000000EC  C001                     and.b      D0, D1
  78. 000000EE  322D E852                move.w     D1, [A5 - 0x17AE]
  79. 000000F2  48C1                     ext.l      D1
  80. 000000F4  B2AE FFFA                cmp.l      D1, [A6 - 0x6]
  81. 000000F8  5DC1                     slt        D1
  82. 000000FA  4401                     neg.b      D1
  83. 000000FC  C001                     and.b      D0, D1
  84. 000000FE  6700 0008                beq        +0xA /* 00000108 */
  85. 00000102  1D7C 0001 FFFF           move.b     [A6 - 0x1], 0x1
  86. label00000108:
  87. 00000108  4A2E FFFF                tst.b      [A6 - 0x1]
  88. 0000010C  6700 0152                beq        +0x154 /* 00000260 */
  89. 00000110  4267                     clr.w      -[A7]
  90. 00000112  A889                     syscall    TextMode
  91. 00000114  302D E852                move.w     D0, [A5 - 0x17AE]
  92. 00000118  5240                     addq.w     D0, 1
  93. 0000011A  E748                     lsl        D0.w, 3
  94. 0000011C  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  95. 00000120  3F30 0000                move.w     -[A7], [A0 + D0.w]
  96. 00000124  302D E852                move.w     D0, [A5 - 0x17AE]
  97. 00000128  5240                     addq.w     D0, 1
  98. 0000012A  E748                     lsl        D0.w, 3
  99. 0000012C  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  100. 00000130  3230 0000                move.w     D1, [A0 + D0.w]
  101. 00000134  0441 0045                subi.w     D1, 0x45 /* 'E' */
  102. 00000138  3F01                     move.w     -[A7], D1
  103. 0000013A  A893                     syscall    MoveTo
  104. 0000013C  3F3C 0014                move.w     -[A7], 0x14
  105. 00000140  A887                     syscall    TextFont
  106. 00000142  3F3C 000C                move.w     -[A7], 0xC
  107. 00000146  A88A                     syscall    TextSize
  108. 00000148  486E FFF2                pea.l      [A6 - 0xE]
  109. 0000014C  302D E852                move.w     D0, [A5 - 0x17AE]
  110. 00000150  5240                     addq.w     D0, 1
  111. 00000152  E748                     lsl        D0.w, 3
  112. 00000154  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  113. 00000158  3F30 0000                move.w     -[A7], [A0 + D0.w]
  114. 0000015C  302D E852                move.w     D0, [A5 - 0x17AE]
  115. 00000160  5240                     addq.w     D0, 1
  116. 00000162  E748                     lsl        D0.w, 3
  117. 00000164  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  118. 00000168  3230 0000                move.w     D1, [A0 + D0.w]
  119. 0000016C  0441 0051                subi.w     D1, 0x51 /* 'Q' */
  120. 00000170  3F01                     move.w     -[A7], D1
  121. 00000172  302D E852                move.w     D0, [A5 - 0x17AE]
  122. 00000176  5240                     addq.w     D0, 1
  123. 00000178  E748                     lsl        D0.w, 3
  124. 0000017A  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  125. 0000017E  3230 0000                move.w     D1, [A0 + D0.w]
  126. 00000182  5041                     addq.w     D1, 8
  127. 00000184  3F01                     move.w     -[A7], D1
  128. 00000186  302D E852                move.w     D0, [A5 - 0x17AE]
  129. 0000018A  5240                     addq.w     D0, 1
  130. 0000018C  E748                     lsl        D0.w, 3
  131. 0000018E  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  132. 00000192  3230 0000                move.w     D1, [A0 + D0.w]
  133. 00000196  0441 0045                subi.w     D1, 0x45 /* 'E' */
  134. 0000019A  3F01                     move.w     -[A7], D1
  135. 0000019C  A8A7                     syscall    SetRect
  136. 0000019E  486E FFF2                pea.l      [A6 - 0xE]
  137. 000001A2  486D FFD6                pea.l      [A5 - 0x2A]
  138. 000001A6  A8A5                     syscall    FillRect
  139. 000001A8  3F3C 0002                move.w     -[A7], 0x2
  140. 000001AC  A889                     syscall    TextMode
  141. 000001AE  302D E852                move.w     D0, [A5 - 0x17AE]
  142. 000001B2  5240                     addq.w     D0, 1
  143. 000001B4  E748                     lsl        D0.w, 3
  144. 000001B6  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  145. 000001BA  3F30 0000                move.w     -[A7], [A0 + D0.w]
  146. 000001BE  302D E852                move.w     D0, [A5 - 0x17AE]
  147. 000001C2  5240                     addq.w     D0, 1
  148. 000001C4  E748                     lsl        D0.w, 3
  149. 000001C6  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  150. 000001CA  3230 0000                move.w     D1, [A0 + D0.w]
  151. 000001CE  0441 0045                subi.w     D1, 0x45 /* 'E' */
  152. 000001D2  3F01                     move.w     -[A7], D1
  153. 000001D4  A893                     syscall    MoveTo
  154. 000001D6  3F3C 0014                move.w     -[A7], 0x14
  155. 000001DA  A887                     syscall    TextFont
  156. 000001DC  3F3C 000C                move.w     -[A7], 0xC
  157. 000001E0  A88A                     syscall    TextSize
  158. 000001E2  3F3C 003F                move.w     -[A7], 0x3F /* '?' */
  159. 000001E6  A883                     syscall    DrawChar
  160. 000001E8  3F3C 000E                move.w     -[A7], 0xE
  161. 000001EC  A887                     syscall    TextFont
  162. 000001EE  3F3C 0018                move.w     -[A7], 0x18
  163. 000001F2  A88A                     syscall    TextSize
  164. 000001F4  2F3C 0000 000A           move.l     -[A7], 0xA /* '\n' */
  165. 000001FA  486D FE3A                pea.l      [A5 - 0x1C6]
  166. 000001FE  4EAD 00EA                jsr        [A5 + 0xEA /* export_25 */]
  167. 00000202  302D E852                move.w     D0, [A5 - 0x17AE]
  168. 00000206  5240                     addq.w     D0, 1
  169. 00000208  E748                     lsl        D0.w, 3
  170. 0000020A  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  171. 0000020E  3F30 0000                move.w     -[A7], [A0 + D0.w]
  172. 00000212  302D E852                move.w     D0, [A5 - 0x17AE]
  173. 00000216  5240                     addq.w     D0, 1
  174. 00000218  E748                     lsl        D0.w, 3
  175. 0000021A  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  176. 0000021E  3230 0000                move.w     D1, [A0 + D0.w]
  177. 00000222  0441 0045                subi.w     D1, 0x45 /* 'E' */
  178. 00000226  3F01                     move.w     -[A7], D1
  179. 00000228  A893                     syscall    MoveTo
  180. 0000022A  3F3C 0014                move.w     -[A7], 0x14
  181. 0000022E  A887                     syscall    TextFont
  182. 00000230  3F3C 000C                move.w     -[A7], 0xC
  183. 00000234  A88A                     syscall    TextSize
  184. 00000236  487A 0036                pea.l      [PC + 0x36 /* 0000026E */]
  185. 0000023A  A884                     syscall    DrawString
  186. 0000023C  2F3C 0000 0005           move.l     -[A7], 0x5
  187. 00000242  486D FE3A                pea.l      [A5 - 0x1C6]
  188. 00000246  4EAD 00EA                jsr        [A5 + 0xEA /* export_25 */]
  189. 0000024A  3F3C 0002                move.w     -[A7], 0x2
  190. 0000024E  A889                     syscall    TextMode
  191. 00000250  3F3C 000E                move.w     -[A7], 0xE
  192. 00000254  A887                     syscall    TextFont
  193. 00000256  3F3C 0018                move.w     -[A7], 0x18
  194. 0000025A  A88A                     syscall    TextSize
  195. 0000025C  6000 000C                bra        +0xE /* 0000026A */
  196. label00000260:
  197. 00000260  3F3C 0001                move.w     -[A7], 0x1
  198. 00000264  A9C8                     syscall    SysBeep
  199. 00000266  422D E851                clr.b      [A5 - 0x17AF]
  200. label0000026A:
  201. 0000026A  4E5E                     unlink     A6
  202. 0000026C  4E75                     rts
  203. 0000026E  013F                     btst       <<invalid special address>>, D0
  204.